create or replace
PROCEDURE SP_GUARDAR_INCIDENCIA_VENTA(
                    p_deVenta in varchar2,
                    p_deMensaje in varchar2,
                    p_deError in varchar2,
                    p_stTipoIncidencia in varchar2)
AS 

mensaje varchar2(2000);

BEGIN
  mensaje := replace(p_deMensaje,'''', ''''''); 
  insert into clpm_incidencias_ventas (
      id, 
      de_venta, 
      de_mensaje, 
      de_error, 
      co_tipo_mensaje, 
      da_fecha_creacion) values (		
         SEQ_INCIDENCIAS.nextval, 
          p_deVenta, 
          mensaje, 
          p_deError, 
          p_stTipoIncidencia, 
          sysdate);  
END SP_GUARDAR_INCIDENCIA_VENTA;